From: Eric Hanchrow <eric.hanchrow@gmail.com>
Date: Sat, 8 Jan 2011 19:49:02 +0000 (-0500)
Subject: * net/ldap.el (ldap-search-internal): Discard stderr output.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~18^2~150
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=1238e789a2b5a90343215d4a1a1453fd996336d4;p=emacs.git

* net/ldap.el (ldap-search-internal): Discard stderr output.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 53b00957741..fd5f62b98d4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-01-08  Eric Hanchrow  <eric.hanchrow@gmail.com>
+
+	* net/ldap.el (ldap-search-internal): Discard stderr output.
+
 2011-01-07  Eli Zaretskii  <eliz@gnu.org>
 
 	* files.el (directory-abbrev-alist): Doc fix.  (Bug#7777)
diff --git a/lisp/net/ldap.el b/lisp/net/ldap.el
index afdb0fe3e13..f1cc534ae85 100644
--- a/lisp/net/ldap.el
+++ b/lisp/net/ldap.el
@@ -558,7 +558,8 @@ an alist of attribute/value pairs."
 	  (setq arglist (nconc arglist (list (format "-z%s" sizelimit)))))
       (eval `(call-process ldap-ldapsearch-prog
 			   nil
-			   buf
+			   ;; Ignore stderr, which can corrupt results
+			   (list buf nil)
 			   nil
 			   ,@arglist
 			   ,@ldap-ldapsearch-args